Top 10k strings from Logo (1984)(Kuma Computers).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   9 ;"OFF SCREEN":
   5 d$="contin"
   4 b(wor,loc,1
   4 "distance";par
   3 b(wor,loc,2
   2 temp=cur+ang:
   2 d$="repeat"
   2 b(w,index,1
   2 b(ff,ind,1
   2 ang=thet/180
   2 ;"STOP TAPE":
   2 ;"PRESS ANY KEY"
   2 ;"I cant ";d$:
   2 "enter angle";par
   2 "Parameter";par:
   2                                                                                           
   1 thet=par+angle
   1 thet=-(par+angle)
   1 size=size+par
   1 q$(wor)=v$
   1 par=b(w,index,2
   1 par=b(w,e,2
   1 par=b(ff,ind,2
   1 par=b(ff,f,2
   1 o$="                ":
   1 logo      19 
   1 l=par+size:
   1 index=index+1
   1 fill  reversifgt  iflt  size  angle right left  draw  erase jump  back  round colourreset to    defno clear calc  menu  repeatprog  sys   print 
   1 d$="stop  "
   1 d$="end   "
   1 d$="     "
   1 angle=angle+par
   1 Created with Ramsoft MakeTZX
   1 ;e$;"=";ans;"=ans"
   1 ;"To proceed press P"
   1 ;"LOGO Graphics Interpreter":
   1 ;"FORGET IT  ":
   1 ;"                    "
   1 "to (starts procedure definition)":
   1 "sys","repeat":
   1 "stop (stops interpreter)"
   1 "size","angle":
   1 "reset","reverse":
   1 "radius";par
   1 "print","prog":
   1 "or parameter per line"
   1 "length";par
   1 "left","right":
   1 "jump","erase":
   1 "ifgt","iflt":
   1 "fill","revers","ifgt","iflt","size","angle","right","left","draw","erase","jump","back","round","colour","reset","to","defno","clear","calc","menu","repeat","prog","sys","print"
   1 "fill (fills in circles)":
   1 "enter command";d$
   1 "enter colour code";par
   1 "end (ends procedure definition)":
   1 "draw","back":
   1 "defno  (lists defined procedures":
   1 "continue","round":
   1 "colour","menu":
   1 "clear (restarts)":
   1 "calc (calculator)":
   1 "We have ";wor;" new procedures"
   1 "They are"
   1 "Procedures available:":
   1 "Press S to save on tape"
   1 "Press PLAY on tape":
   1 "Parameter";pb
   1 "Parameter ";pa
   1 "Number of times";tn
   1 "Number of times ";nz
   1 "Number of times ";nt
   1 "L to load from tape"
   1 "Enter size change";par
   1 "Enter procedure name";v$:
   1 "Enter procedure ";d$
   1 "Enter expression";e$
   1 "Enter command";d$
   1 "Enter command ";d$
   1 "Enter colour code";par
   1 "Enter angle change";par
   1 "Define procedure,one command":
   1 "Compiling new procedure"
   1 "Command";d$
   1  S.J.Wainwright 1983"
   1